perm filename S4[HAL,HE] blob
sn#200997 filedate 1976-02-07 generic text, type T, neo UTF8
(PR
(BL
(FVAR ORG)
(FVAR SH_GR SH_END)
(FVAR BASE )
(TVAR DUMMY1 DUMMY8 DUMMY13 DUMMY20)
(AS ORG (FMAKE NILROTN (VMAKE 3.5 40 .13)))
(AFFIX SH_END ORG DUMMY1 (TMAKE NILROTN (VMAKE 9.23 2.5 .06)) NONRIGIDLY)
(AFFIX BASE ORG DUMMY8 (TMAKE NILROTN (VMAKE 14.8 3.06 2.26)) NONRIGIDLY)
(AFFIX SH_GR SH_END DUMMY13
(TMAKE (AXW_ROTN YHAT 3.14159) (VMAKE 0 0 1.2))RIGIDLY)
(AFFIX BARM SH_GR DUMMY20 (TMAKE NILROTN NILVECT) RIGIDLY)
(MO SH_END
(TTMUL BASE (TMAKE(AXW_ROTN ZHAT -.785398)
(VMAKE 0 0 -0.2)))
(VIA (TTMUL BASE(TMAKE(AXW_ROTN ZHAT -.785398)(VMAKE 0 0 3)))))
)
)